﻿Public Class NhapXuatDT
    Private _ma As String
    Public Property Ma
        Get
            Return _ma
        End Get
        Set(ByVal value)
            _ma = value
        End Set
    End Property

    Private _ngay As Date
    Public Property Ngay
        Get
            Return _ngay
        End Get
        Set(ByVal value)
            _ngay = value
        End Set
    End Property

    Private _maNV As String
    Public Property MaNV
        Get
            Return _maNV
        End Get
        Set(ByVal value)
            _maNV = value
        End Set
    End Property

    Private _tongtien As Double
    Public Property TongTien
        Get
            Return _tongtien
        End Get
        Set(ByVal value)
            _tongtien = value
        End Set
    End Property

    'Tim Kiem
    Public Sub New(ByVal ma As String)
        Me._ma = ma
    End Sub

    'Khoi Tao Nhap
    Public Sub New(ByVal ma As String, ByVal ngay As Date, ByVal maNV As String)
        Me._ma = ma
        Me._ngay = ngay
        Me._maNV = maNV
    End Sub

    'Khoitao Xuat
    Public Sub New(ByVal ma As String, ByVal ngay As Date, ByVal maNV As String, ByVal tongtien As Double)
        Me._ma = ma
        Me._ngay = ngay
        Me._maNV = maNV
        Me._tongtien = tongtien
    End Sub

    'Update tongtien cho Xuat
    Public Sub New(ByVal ma As String, ByVal tongtien As Double)
        Me._ma = ma
        Me._tongtien = tongtien
    End Sub
End Class
